home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmsyscm / _setup.1 / AHMTWavePlayer.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-11-12  |  1.8 KB  |  56 lines

  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTWavePlayer.pas' rev: 3.00
  6.  
  7. #ifndef AHMTWavePlayerHPP
  8. #define AHMTWavePlayerHPP
  9. #include <MMSystem.hpp>
  10. #include <AHMSystem.hpp>
  11. #include <Classes.hpp>
  12. #include <SysUtils.hpp>
  13. #include <Messages.hpp>
  14. #include <Windows.hpp>
  15. #include <SysInit.hpp>
  16. #include <System.hpp>
  17.  
  18. //-- user supplied -----------------------------------------------------------
  19.  
  20. namespace Ahmtwaveplayer
  21. {
  22. //-- type declarations -------------------------------------------------------
  23. class DELPHICLASS TAHMWavePlayer;
  24. class PASCALIMPLEMENTATION TAHMWavePlayer : public Ahmsystem::TAHMExecuteComponent 
  25. {
  26.     typedef Ahmsystem::TAHMExecuteComponent inherited;
  27.     
  28. private:
  29.     System::AnsiString FWaveFile;
  30.     bool FAsynchronously;
  31.     Classes::TNotifyEvent FOnError;
  32.     bool __fastcall PlayWave(const System::AnsiString sndFile, bool Asy);
  33.     
  34. public:
  35.     bool __fastcall Play(System::AnsiString Filename, bool Async);
  36.     virtual bool __fastcall Execute(void);
  37.     __fastcall virtual TAHMWavePlayer(Classes::TComponent* AOwner);
  38.     
  39. __published:
  40.     __property System::AnsiString WaveFile = {read=FWaveFile, write=FWaveFile};
  41.     __property bool Asynchronously = {read=FAsynchronously, write=FAsynchronously, default=1};
  42.     __property Classes::TNotifyEvent OnError = {read=FOnError, write=FOnError};
  43. public:
  44.     /* TComponent.Destroy */ __fastcall virtual ~TAHMWavePlayer(void) { }
  45.     
  46. };
  47.  
  48. //-- var, const, procedure ---------------------------------------------------
  49.  
  50. }    /* namespace Ahmtwaveplayer */
  51. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  52. using namespace Ahmtwaveplayer;
  53. #endif
  54. //-- end unit ----------------------------------------------------------------
  55. #endif    // AHMTWavePlayer
  56.